#pragma once

#include "Sock.hpp"
#include <iostream>
#include <string>
#include <functional>
#include <sys/select.h>
#include <unistd.h>

#define NUM 1024


//select的特点：
//1、每次调用select都要我们手动添加fd
//2、每次调用select这个系统调用的时候都要将用户态转换成内核态
//3、每次调用select的时候都要遍历一遍所有的fd
namespace select_ns
{
    using func_t = std::function<std::string(std::string)>;
    const uint16_t defaultport = 8080;
    const int defaultsock = -1;
    const int fdnum = 512 * 8;
    //IO的过程就是：等+数据拷贝的过程
    //而select、poll、epoll将IO的这个过程拆开了
    //它们独自完成了等的过程
    //整个等的过程都交给了OS完成，这种IO的方式又被称为异步IO
    class SelectServer
    {
    public:
        SelectServer(func_t f, uint16_t port = defaultport) : _port(port), _listensock(-1), _f(f)
        {
        }
        ~SelectServer()
        {
            if (_listensock != defaultsock)
                close(_listensock);
            if (_read_array != nullptr)
                delete[] _read_array;
        }

    public:
        void initServer() // select这种服务器需要我们自己维护一个辅助数组，用于用于记录当前有哪些需要等待的事件，以及找到最大的fd
        {
            _listensock = Sock::Socket();
            Sock::Bind(_port, _listensock);
            Sock::Listen(_listensock);
            _read_array = new int[fdnum];
            for (int i = 0; i < fdnum; i++)
            {
                _read_array[i] = defaultsock;
            }
            // 这里可以保证该辅助数组的第一个元素一定是这个监听套接字
            _read_array[0] = _listensock;
        }
        void start()
        {
            for (;;)
            {
                fd_set _rfds;
                int maxfd = _read_array[0];
                // 对读事件进行初始化
                FD_ZERO(&_rfds);
                print();
                for (int i = 0; i < fdnum; i++)
                {
                    // 过滤掉非法的fd
                    if (_read_array[i] == defaultsock)
                        continue;
                    FD_SET(_read_array[i], &_rfds); // 将合法的fd放到read事件中
                    // 找到最大的fd
                    if (_read_array[i] > maxfd)
                        maxfd = _read_array[i];
                }
                // 1、该辅助数组上没有这个套接字
                // 2、该辅助数组上有这个套接字，但是没有被设进读事件中
                // 3、该辅助数组上有这个套接字，且这个套接字被设进了读事件中
                // struct timeval tv = {1, 0}; // try、
#if - DEBUG
                logMessage(DEBUG, "waiting......");
#endif
                std::cout << maxfd << std::endl;
                int n = select(maxfd + 1, &_rfds, nullptr, nullptr, nullptr);
                switch (n)
                {
                case 0:
                    logMessage(NORMAL, "time out......");
                    break;
                case -1:
                    logMessage(ERROR, "select error: %s", strerror(errno));
                    break;
                default:
                    logMessage(NORMAL, "read ready!");
                    handler_event(_rfds);
#if - DEBUG
                    logMessage(DEBUG, "handler end");
#endif
                    break;
                }
            }
        }

    public:
        void print()
        {
            // 将辅助数组中的元素打印出来
            for (int i = 0; i < fdnum; i++)
            {
                if (_read_array[i] == defaultsock)
                    continue;
                std::cout << _read_array[i] << " ";
            }
            std::cout << std::endl;
        }
        void accepter() // 用于获取链接
        {
#if - DEBUG
            logMessage(DEBUG, "here accpeter");
#endif
            std::string clientip;
            uint16_t clientport = 0;
            int sock = Sock::Accept(_listensock, &clientip, &clientport);
            if (sock < 0)
            {
                logMessage(ERROR, "socket accept error");
                return;
            }
            logMessage(NORMAL, "socket accept success[%s:%d]", clientip.c_str(), clientport);
            addfd(sock);
        }
        void recver(int sock, int pos) // 用于从链接中获取数据
        {
#if - DEBUG
            logMessage(DEBUG, "here recver");
#endif
            char buffer[NUM];
            int n = recv(sock, buffer, sizeof(buffer) - 1, 0);
            if (n > 0)
            {
                logMessage(NORMAL, "get a message: %s", buffer);
            }
            else if (n == 0)
            {
                // 说明此时客户端关闭，需要将套接字关闭，并将辅助数组上对应位置的套接字初始化
                close(sock);
                logMessage(NORMAL, "sock close!");
                _read_array[pos] = defaultsock;
                return;
            }
            else
            {
                // 说明此时read系统调用失败，将错误信息打印出来
                close(sock);
                logMessage(ERROR, "%s", strerror(errno));
                _read_array[pos] = defaultsock;
                return;
            }

            // write
            // 1、对获取的数据进行处理，并获得对应的响应
            std::string resp = _f(buffer);
            resp[resp.size()-1] = 0;
            logMessage(DEBUG, "resp size: %d", resp.size());
            // logMessage(DEBUG, "%s", resp);
#if -DEBUG
            logMessage(DEBUG, "resp size: %d", resp.size());
#endif
            // 2、将响应的数据重新传给客户端
            write(sock, resp.c_str(), resp.size());
        }
        void addfd(const int &sock) // 向辅助数组中新加fd
        {
#if - DEBUG
            logMessage(DEBUG, "here addfd");
#endif
            int i = 0;
            for (; i < fdnum; i++) // 将新的套接字放入辅助数组中
            {
                if (_read_array[i] == defaultsock)
                    break;
            }
            if (i == fdnum)
            {
                // 说明此时服务器的承受能力达到了顶峰，所以需要将这个套接字关闭
                logMessage(WARNING, "server is full");
                close(sock);
            }
            else
            {
                // 说明此时是正常的
#if - DEBUG
                logMessage(DEBUG, "addfd success");
#endif
                _read_array[i] = sock;
            }
        }
        void handler_event(fd_set &_rfds) // 对读事件进行处理
        {
#if - DEBUG
            logMessage(DEBUG, "here handler");
#endif
            for (int i = 0; i < fdnum; i++)
            {
                // 过滤掉非法的fd
                if (_read_array[i] == defaultsock)
                    continue;
                // 加入此时是监听套接字，则进行获取新连接
                if (FD_ISSET(_read_array[i], &_rfds) && _read_array[i] == _listensock)
                    accepter();
                // 否则从该套接字中获取数据
                else if (FD_ISSET(_read_array[i], &_rfds))
                {
                    recver(_read_array[i], i);
                }
            }
#if - DEBUG
            print();
#endif
        }

    private:
        int _listensock;
        uint16_t _port;
        func_t _f;
        int *_read_array;
    };
}
